﻿Public Class Form6

    Private Sub Form6_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim i = IO.File.ReadAllText("news.txt")
        TextBox1.Text = i
        IO.File.Delete("news.txt")
    End Sub
End Class